(use-package tabbar
  :ensure)
(require 'tabbar)
(global-set-key (kbd "M-<up>") 'tabbar-backward-group)
(global-set-key (kbd "M-<down>") 'tabbar-forward-group)
(global-set-key (kbd "M-<right>") 'tabbar-forward)
(global-set-key (kbd "M-<left>") 'tabbar-backward)
(setq tabbar-cycle-scope 'tabs)
(setq tabbar-buffer-groups-function (lambda () (list "All Buffers")))
(setq tabbar-buffer-list-function
      (lambda ()
        (remove-if
         (lambda(buffer)
           (find (aref (buffer-name buffer) 0) " *"))
         (buffer-list))))
(set-face-attribute 'tabbar-button nil)
(set-face-attribute 'tabbar-default nil
 :background "gray"
 :foreground "gray30")
(set-face-attribute 'tabbar-selected nil
 :inherit 'tabbar-default
 :background "cyan"
 :box '(:line-width 3 :color "DeepSkyBlue"))
(set-face-attribute 'tabbar-unselected nil
 :inherit 'tabbar-default
 :box '(:line-width 3 :color "gray"))
(custom-set-variables '(tabbar-separator (quote (1.8))))
(tabbar-mode t)
(provide 'init_tabbar)
